home *** CD-ROM | disk | FTP | other *** search
/ Delphi Magazine Collection 2001 / Delphi Magazine Collection 20001 (2001).iso / DISKS / Issue71 / Construc / LOGIN.DPR < prev    next >
Encoding:
Text File  |  2001-06-01  |  375 b   |  15 lines
  1. program login;
  2. {$APPTYPE CONSOLE}
  3. uses
  4.   DrBobCGI;
  5. begin
  6.   writeln('content-type: text/html');
  7.   writeln;
  8.   writeln('<html>');
  9.   writeln('<body bgcolor=ffffcc>');
  10.   writeln('<h1>Welcome ' + Value('login') + '</h1>');
  11.   writeln('<hr>');
  12.   writeln('Your password [', Value('password'), '] will be safe with us...');
  13.   writeln('</body>');
  14.   writeln('</html>')
  15. end.